home *** CD-ROM | disk | FTP | other *** search
/ Super League / Super League.iso / TUTORIAL / CURSO / WHERE.DXR / 00018.ls < prev    next >
Encoding:
Text File  |  1997-03-25  |  796 b   |  38 lines

  1. on enterFrame
  2.   global var1, var2
  3.   if chars(var2, 6, 6) = "1" then
  4.     if var1 < 5 then
  5.       set the visible of sprite 30 to 1
  6.     end if
  7.     if var1 >= 5 then
  8.       if var1 <= 76 then
  9.         set the visible of sprite 31 to 1
  10.       else
  11.         set the visible of sprite 32 to 1
  12.       end if
  13.     end if
  14.   end if
  15.   if chars(var2, 6, 6) = "2" then
  16.     set the visible of sprite 33 to 1
  17.   end if
  18.   if chars(var2, 6, 6) = "3" then
  19.     set the visible of sprite 34 to 1
  20.   end if
  21.   if chars(var2, 6, 6) = "4" then
  22.     set the visible of sprite 35 to 1
  23.   end if
  24.   if chars(var2, 6, 6) = "5" then
  25.     if var1 <= 110 then
  26.       set the visible of sprite 36 to 1
  27.     end if
  28.     if var1 > 110 then
  29.       set the visible of sprite 37 to 1
  30.     end if
  31.   end if
  32. end
  33.  
  34. on exitFrame
  35.   general()
  36.   go(#loop)
  37. end
  38.